(exec-to-string): New alias.

diff --git a/lisp/emacs-lisp/lucid.el b/lisp/emacs-lisp/lucid.el
index 5ae9e31a8ee8bc6084b8afb4c4bf7ce6f68c75cb..5c609137ffe8a56283dfa207e586d40d8e90ba89 100644 (file)
--- a/lisp/emacs-lisp/lucid.el
+++ b/lisp/emacs-lisp/lucid.el
@@ -135,6 +135,8 @@ bottom of the buffer stack."
 (defalias 'find-face 'internal-find-face)
 (defalias 'get-face 'internal-get-face)
 (defalias 'try-face-font 'internal-try-face-font)
+
+(defalias 'exec-to-string 'shell-command-to-string)
 \f
 (defun make-extent (beg end &optional buffer)
   (make-overlay beg end buffer))